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Subscriptions= $10.00/year 
or free with swap. Send to: 


SINCLAIR MILWAUKEE USERS GROUP 
P.O. Box 101 Butler, WI 53007 
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THIS MONTH: 

— Bill On OL With Boot Prog. 
— Dick On QL Networking 
Rudy's "SQ" NOTES 

— Presidents Message 

— And Other Great Things 

If any articles are copied 


piease credit SMUG Bytes 
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Send all contributions by the 
first day ot the month to: 


Bill Heberlein 

x Editor 

x SMUG BYTES 

* 5052 N. 9ilst Street. 
x Milwaukee, WI 53225 
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198a OFFICERS 
& WORKING 
MEMBERS 


All Area Codes Are 414 
President — N. Schultz 
= 353° 45.22 
V. Pres. -— W. Heberlein 
- 527 2191 
Secretary — L. Dreger 
— 321 0694 
Treasurer -— J. Frohboese 
= 377 1385 
Education — R. Cultice 
- 542 3591 


— Librarians 
Tape/Disk — E. Pawloski 
= 1 338 0260 
Book - D. Nickels 
— 1 284 9691 


— Sub Group Leaders 
Games — N. Schultz 
=.353 -4522 
Meeting on 3rd Sat. 
Hardware — G. Kraemer 
— 421 0179 
No set date. Call for info. 
Spectrum — R. Hilsmann 


- 451 5291 
Meeting on 3rd Wed. of the month. 
RP/M — R. Cultice 

- 542 3591 
Meeting on 4th Wed. of the month. 
QL — R. Hilsmann 

— 251 5291 


Meeting date see Spectrum group. 


of the month. 
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FOR SALE: 


t 


If you have anything for sale, you can advertise it for free in 

this newsletter (provided you're a SMUG member). Our newsletter 
reaches an ever-growing number of TS User Groups throughout the 

country, increasing your chances of a sale. 


Dr. Lloyd Dreger has his second "Machine Code" book ready. This 
book takes up where the last one left off. This book will take 
you deeper into the intricacies of that monster, mąchine code 
programming. 


The price will be the same as the other book $16.95 (SMUG 
members $15.00) plus $1.50 S&H. 


The following are the seminars from the 1987 Midwest 
Computerfest. Prices are $10 for the first seminar and $2 for 
each seminar after that for up to six seminars. Two tapes can 
hold all the seminars or a total cost of $40. 


"MACHINE CODE FOR THE ZxX81" 

“DESK TOP PUBLISHING" 

“THE FORTH LANGUAGE" 

“GRAPHICS ON THE TS2068/SPECTRUM" 
“HARDWARE INTERFACING 1" 

“HARDWARE INTERFACING 2" 

This is Saturday (1) and Sunday (2) 
“PRINTER AND PRINTER INTERFACES" 
“OL AND SUPERIOR SINCLAIR TECH" 
"COMPUSERVE" 

“COTTAGE INDUSTRY/ COMPUTER" 
“ROUNDTABLE DISCUSSION OF TS TELE" 
“COMPUTER LITERACY” 


Available through: 
SMUG P.O./Box 101/Butler WI 53007 
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"so" NOTES 
BY R.A.HILSMANN 


This column is dedicated to the 
SDOS DISK SYSTEM, or you may call 
it the OLIGER DISK SYSTEM. Also to 
the SPECTRUM emulated Timex compu- 
ter, and SOFTWARE written for 
either one of the above. Further it 
will cover the SINCLAIR OL computer 
as time and need will mandates such 
coverage. Does this mean that soft- 
ware you will find here will not 
work in the Timex mode? Of course 
not, fact is that all software you 
will find in this column will most 
likely work in both systems. The 
hangup may be that some programs 
will not work properly in the Timex 
mode, since the Timex has less 
memory available. The program for 
this month is written to run only 
in the TIMEX MODE, since the SPEC- 
TRUM ROM does not support error 
trapping, necesarry in this par- 
ticular program. 


I hope you enjoyed the LIBRARY 
program I had for you last month, 
which had of course been written 
for the SDOS DISK SYSTEM. I neglec- 
ted to mention this last month and 
hope that all who have ordered or 
entered same were aware of this. I 
have updated the program a few 
times since to version 1.4, which 
includes the RENAME DISK feature. 
This will not only rename all the 
LIBRARY files, But also the DISK. 

I had found this necessary, since 
my disk library was a mess. 

As all previous programs you had 
found here, this new version is 
available to you if you send $ 5 
to: 

IMPEX SOFTWARE 
P.O. BOX 45 
MENOMONEE FALLS,WI. 53051 


keep in mind that I will send tapes 
only, since tapes do not come with 
different tracks and one or two 
sides etc. besides you'll have a 
backup on tape if you should ever 
loose the disk and are not able to 
recover it with the following pro- 
gram "RECOVER". 
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1 REM FILL THIS LINE WITH 
SPACES 


4 
a 
2 FOR MACHINE CoD! 
; 


2 SOFTUARE 
DOMAIN 
SHANH 


20 LET 8=8: FAHPER A: 
RPOER A: CLS : DIK At 
Bst16) : DIH CHlisbse.28) 

: LET FL=A: GU SUB 
AT 10,8; "Bsa vou need 

new DiskPirectory on 
d diske? ; (Yes + 
T "Y/N "Q$: IF Og="n 


(e) 


30 CLS : GO SUB 480: PRINT AT 
i18, 0; “Insert disk into drive of 
your choice and enter drive mum 
ber be tow. “i 

4@ IF NOT FL THEN PRINT “Disk 
will be processed to receive 5 
temporary directory” 

59 GO SUB 432: INPUT “WHICH DR 
TUE 720.1. TO 4) Ks LEP. 7D=k=1 

6@ IF NOT FL THEN GO SUB 488: 
INPUT “ENTER NEU DISK NAHE +"; BS 

70 IF NOT FL THEN CLS : 60 SUB 
430: PRINT AT 18,8; "DISK WILL E 
E PROCESSEB NOU’ "PRESS ENTER H 
HEN READY": PAUSE 2 

B@ CLS : GO SUB 488: PRINT AT 
18,7; FLASH i; “one moment pleas 
i= AT 15,9; "PROCESSING NOW: } 
fl TO| 187: LET C4 iA, TO iğ) =”0 
YL # “+5TR$ A+" SRS Oe =e CsA, ii 
TO } SCHR 34+CHRS$ @4CHRS 284°UH 
sl “SCHR S44+0HRE B4+CHRE B4+0HRS 


a0 IF A=i THEN LET Cg$th,19: =CH 


E 
R 


R$ 1 
1808 NEXT : GO SUB i152 
118 FOR STEP 2: LEF 
Sik = 3 CHiK+i,45:= 
LET 
EET G 
: = Fis To 
38824. “7 HEEXT x 
SATURN 
A ae DATA 225, iñ, g, 237,175,285, 1 
:18,225,42,75,392,237,18,28,: i 
7°46 ,98,1,18,0,24,232 ,48,75,82,1 
7:;40,28,25,17,32,38,1,15,153,e24,2 
i? 42,75 92,37,12,8,25,17,8,52,1 
»8,28,237,1765,281,42,75,92,17,i12 
eee tse OOS Sete Atel eee 
170 DATA 2237,41651,32,2438,257,1581 
»2090,24,245,42,75,92,17,11,28,25 
»1,0,28,52,153,257,169,208,24,251 
.42,75,92,17,11,28,1,08,28,25,62, 
229,237,169,48,252,62,8,237,168, 
192, (24,251 
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1368 RANDOMIZE USR 26730: RANDOM 
IZE USR 267 

19@ LET DR=o: CLS : GO SUE 48a.- 
PRINT AT 5,8; “DAMAGED DISK WILL 
BE CHECKED FOR INTACT DATA N 
OU. PLEASE FOLLOU THE PROMPT 
S{ °° PRESS ER ITER UHEN READY" FA 
USE @: LET NExT=2 

280 ON ERR GO TO 208: LET Fk=1 
218 GO = rā: LET Z=Z+4+12: For 


Xx=NEXT TO 167: i CYL=x: PRINT 
AT 8,25 L “X: LET D$="CYL # 
“457TRSE ‘D$CODE Z: IF co 
DE A$iil =22 ND CODE A$ (5128) -2 
23 THEN =@: CLS : PRINT AT 
1a, @; “CYLINDE R “X; IS NOT REC 
OUPRABLE' << = CHECKING CYLINDER 
are oo Or NOW" 7 : 7 PRESS ZERO ið} T 
O EXIT“ UOR ANY OTHER KEY To ca 
NTINUE “: PAUSE @: IF INKEys="a" 


THEN GO TO 492 
220 IF NOT FL THEN NEXT x 
230 CLS : LET FL=1: GO SUB 462 


PRINT AT 18,8; “CYLINDER “jx” i 
= LOADED NOU’ t "PRESS KEY To VIE 
H DATA “: PAUSE 8 

248 CLS RANDOMIZE USR 25754: 


GO SUB 488: PRINT AT 28,8; INVER 
SE 1; "PRESS {P} TO UIEN IN DATĀ 
FORMAT ONE (413 TO VIEW NEXT CYLI 
NDER "“; #8; "PRESS ZERO (@) Tū RE 
STORE DATA “: PAUSE @: IF INKEYS 
=i" THEN GO TO 2868 

250 IF INKEYS="P" OR INKEY$= 
THEN LET FL=@: CLS : PRINT #0" 
PRESS ZERO (@} TO RESTORE DATA * 
: FOR 5=1 TO 54128: ON ERR Go TO 
300: PRINT AgiS};: IF INKEYg="41" 
THEN GO TO 288 
anne IF INKEY $="@" THEN GO TG 31 
270 IF NOT FL THEN NEXT S 

280 NEXT =: STOP 

29@ ON ERR RESET : NEXT x 

Saa IF NOT FL THEN ON ERR RESET 
: NEXT 5 

Si GN ERR RESET : CLS : Go SUB 
488: PRINT AT 5,@:;"UHAT KIND OF 
DATA IS IT nace 6 BASIC” <72) 


NUMERIC DATA “"-"'3) STRING DATA 
“4l MACHINE CODE "/ 7 "5 STAT 
E OF MACHINE“ ‘S83 VARIABLES” A 


NPUT K: LET LENGSTH=@: LET PROG = 
: LET CL=1: LET DR=DR+1 
320 IF K=5 THEN G0 TO 488 


33@ CLS : LET A=uSR 268770: LET 
A=51260-8 

240 IF 8:8 THEN PRINT ^" TOTAL 
BYTES SAVED="*;FA4LENGTH: Go To = 
Se 

oo CLe¢i: L 
EF LEF X 
=x t> LE 
T “DCO 
E 
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480 LET D$=CHR$ (K-41): IF K=1 T 
HEN LET D$=D$+CHR$ (PROG-25654INT 
(PROG/256) } +CHR$ (INT (PROG/2556 
1l +CHR$ @4+CHRS 644+CHR# (PROG-256 
#INT (PROG/256334CHRS (INT (PROG 
7256) ) +04 (CYL, 18 TO 19) +CHRẸ$ CL: 
LET C#(DR,11 TO 2@3=0%: LET NEX 
T=CYL+CL: éo SUB gee: GO To 288 
410 IF K=2 GR K=8 OR K=4 GOR K=6 
THEN LET DS$=D84+CHRE (PROG-256<4I 
HT (PROG - 255} } +CHR$ (INT (PROG/2 
SGI14+CHRS BS4CHRS 128+C$i0YL, 16 
O 19) +CHR$ CL: LET C$i(DR,1i To 
0) =D$: LET NEXT=CYL¢4CL: éo SUB 
@@: GO TO 288 

420 IF K=5 THEN LET D¢=DS4+CHRS 
@+CHRS 1944+CHRS S4CHR G24CHRsS 2 
S@+CHRE 4403 (CYL, 18 TO 193 4CHRs 
16: LET C$iDR,11 TO 28) =bs: LET 
CL=18: LET NEXT=CYL4CL: GO SUB S 
8: GO To 2828 

43@ S70F 

446 LET DR=DR+1: LET C$iDR, i} =C 

ao 


enn ne 


HR 128 
45@ RANDOMIZE USR 257i 
46@ STOF 


478 LET Z=PEEK 23627+2554PEEK 2 
3628: RETURN 

48@ BEEP .85,235: RETURN 

49@ ON ERR RESET : STOP 

580 GO SUB 452: PRINT #8; "PRESS 
ANY KEY TO CONTINUE “: PAUSE @: 
RETURN 


Enter the basic carefully, mak— 
ing sure that line 1 is typed in to 
the fourth line. This line will 
hold the machine code subroutines 
to speed up certain sections, and 
also the machine code necessary to 
manipulate the disk operating 
system. 


It will help immensely to recov- 
er a disk, if a printout of the 
catalog for the damaged disk is 
available when a recover is neces- 
sary. Should such printout not be 
available, the process becomes a 
guessing game at times. The most 
difficulty will be to recognize the 
type of data on the disk. State of 
the machine is recognized most eas- 
ily if a screen of some kind was 
saved along with the data. There 
are two ways to see what kind of 
Gata you have on a cylinder, the 
first being a screen load where the 
first part of a state of machine is 
where it suspose to be, even if the 
screen had no data on it. it would 
look black. 


Pressing the "p" key will let 
you see other data, for instance 
basic or data is best recognized 
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that way. A machine code program 
has its own peculiar look, as you 
can see in the next column. 


I strongly recomend to take a 
disk with known data on it; copy 
the catalog to a printer, then copy 
the disk to another using the MOVE/ 
command, and practice on this 
copied disk. This will give you the 
feel for the program, and the type 
data you may encounter. It would 
probably be best to copy a disk 
with different types of data on it, 
this would really give you an idea 
what each type looks like. 


Lets look at the next column 
now, the top picture is code in the 
display file. In the next picture 
you have code again, but this time 
it does not fill the screen. The 
next picture is a basic program in 
data format, but unmistakable 
basic. This will give you a good 
idea of how much space numbers take 
up with number tokens and the five 
bytes following. Below you can see 
a typical data format of a screen 
display, hope this will help you 
with the program. 


Last month I mentioned that one 
could only retrieve data and that 
this program would not restore a 
disk period. Not so, I managed to 
write this program, so that it will 
restore a disk, with the exception 
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of any corrupted data and the 
program names, the disk will be 
usable. Program names of course can 
be restored using the RESTORE/ 
feature in OLIGERS SAFE DOS, as to 
the corrupted data, quess thats to 
much to ask. 


John Oligqer has talked about 
adding a RENAME DISK feature to his 
DOS, but I feel this can easely be 
done with a program. Next month you 
will find such a program in this 
column. It is short and simple. 
only a few basic lines and some 
code, or you could use the. new 
version of the DISK LIBRARY to do 
the same thing. I would rather see 
John Oliqer use any space left in 
the BK eprom for something else, 
that is of course, if there is any 
space left. 


As to the DISK RECOVER PROGRAM, 
just follow the prompts, it is easy 
to use, and should not give you any 
problems. I give you a hint, I dont 
like programs where I have to read 
fifty pages of instructions, and I 
believe nobody else should have to 
either. 
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ADDENDUM‘'S * FIXES (BLOOPERS) 


The Library Program last month 
had a few bloopers in it alright. 
Thats why I sat down and redone 
some of the sections. So much for 
being in a hurry. 

Line 1010 should have all state- 
sments which are duplicated on the 
next line removed. 

Also drives dont have to be in 
logical order since data is moved 
to "S". I also added a feature to 
display remaining bytes left on 
destination disk. Fact is there are 
so many changes, that it pays to 
send for it. 


Well that’s it again. I will 
have to take a good look at the 
Program for next month and give you 
all the corrections. Sorry, but 
writing the RECOVER program took a 
while. For next month I will have 
the RENAME DISK program and a few 
other things I hope. 


Till next month # 3 


“It’s pretty depressing, Wilcox: 24,312 dead 
guinea pigs and still not a clue as to why we killed them.” 
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(NOTE NEITHER ANY AUTHOR OR SMUG BYTES TAKES ANY RESPONSIBILITY 
FOR ANY HARDWARE MODIFICATIONS TO YOUR EQUIPMENT. ) 


FROM THE PRES. 


There are two computerfests coming 
up. Nearby the Cleveland group is 
sponsoring one August 26 & 27. For 
the West Coast and any others who 
wish to go is the 3rd Northwest 
Computerfest in Portland Oregon. If 
youve never attended one try it 
you'll like it. The bus trip from 
Milwaukee is 2 days 8 hrs and $121 
or flying from Milwaukee is $318 if 
reservations made in advance. 


Ham and Computer fests coming up 
Sat. JULY 9, the. SMARC presents 
SWAPFEST88 Oak Creek. Amer. Legion 
Post 


Baill on OL 


We have been attending QL classes 
given by Lloyd Dreger. Well they 
have pointed out many of the 
advantages of the QL but also some 
disadvantages, at least compared to 
the TS2068, in the handling of the 


GK ENTERPRISES 


BASIC language. We did find a 
problem with the QL manual. In the 
Keyword section - KEYROW function, 
there is a table showing column and 
row. In column 128, row 5 it should 
read as an alpha O. Along with that 
I would advise redrawing some of 
the other characters. 

The following is a boot program for 
all you with Trump Cards. If you 
have the slower disk drives the 
TRACK and START will change the 
defaults to double density instead 
of quad. Lines 210 thru 350 will 
set the matching keys to return the 
commands when the ALT key and that 
character is pressed. For example 
ALT and 2 will print the words 
delete flp2_ add the name of the 
program on flp2 to delete and press 
enter. The file will be deleted. 
The ALTKEY func. does not require 
Toolkit II but CLOCK, TK2_EXT, WMON 
TRACK & START do. 


Your Coaputer Supply Source 


No need to wait for a sale. 


Our prices are lov everyday 


Wide selection of printer ribbons 


AXIOM C. ITOH 


PANASONIC STAR 


HRKEKSHHEHEEEHE 


SMUG SPECIALe 


SAHNHESEKREKEKEEEEGE 


EPSON OKIDATA 


AND MANY MORE. 


2700 sheets 9 1/2 x 11 20# Microperf 623.50 


SHHeHeeaeeeeeeaaae 


« 646-0111 


SHSHSHHSEHSEESEEEEOG 


6634 U. Mational “Avenue 


SMUG Bytes 


West Allis WI 53227 


May 


100 CLS: TK2_EXT: WMON 202 INK #10,6:PAPER #20,0 
110 FLP_TRACK 40 204 CLOCK #10, '%h:%m' 

120 FLP_START 60 206 CLS 

130 CLS: REM set clock 210 ALTKEY. °°! “list? 

135 INK #2.0 220 ALTKEY ']','flp2_' 

140 AT #2,19,1:PRINT #2,'If set 230 ALTKEY *[*,*fipia.* 

clock "Y" else "N''' 240 ALTKEY '\','cls 40" 

150 IF yn$='Y' OR yn$='y' THEN GO 250 ALTKEY '=','dił flpl_' 

TO 200 260: ALTKEY *=" tair flp2 ' 
152 ELSE 270 ALTKEY '0','format flp1_' 
154 IF yn$='N' OR yn$='n' then 280 ALTKEY '9','format flp2_' 
GO TO 200 290 ALTKEY '8','flp_use mdv' 
156 ELSE 300 ALTKEY '7','mdv_use mdv' 
158 GO TO 150 310 ALTKEY '6','save flp1_' 
159 END IF 320 ALTKEY '5','save flp2_' 
160 INPUT #0.,'YR <> MO <> DY <> HR 330 ALTKEY '4','format rami_1440' 
<> MN <> SC <> <>=ENTER KEY 340 ALTKEY '3','delete flpi_' 
‘;yr,mo,dy,hr,mn,sc 350 ALTKEY ‘2'.'delete flp2_' 
170 SDATE yr,mo,dy,hr,mn,sec 

200 OPEN Tune in next month. 


#10,window_96x10a432x16 : WMON 


The new 
znd Computer Store 
BYTES l For Not-So-New 
computers 


SAS 


& SAVE THE HASSLE. have 2nd BYTES sell your 
“unused “ computer, peripherals and software 
- We are in the Business to sell your computer. 


2 SAVE MONEY, buy your computer, peripheral and 
software at 2nd BYTES. 


2 SAVE TIME, have our professional consultants 
assit you in finding the computer and the 
Programs for your needs. 

- We are in the business to help you select an 
inexpensive system. 


& WARRANTY, on almost all equipment we sell. 
- We service what we sell 


774—1155 


9721 W. Greenfield Ave. West Allis. WI 53214 
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THE QL ON NET Set up your QL and make sure all 


by Dick Cultice units work. Using one of those new 
cables you have just completed, 
When I was asked to do an article connect your machine to another one 
on networking the QL, little was via the net jack located on the 
known about the subject in our right rear. There are two jacks and 
club. So one Sunday afternoon either jack is alright to use. Here 
several members got together and is where we made ~dur mistake. We 
tried it, but with little success. connected the second cable to 
I should say none at all. Very many complete the loop. This 
crashes and unfriendly diagnostics disconnected pull down resistors in 
were seen that day. So that you do the circuit. Use only one cable 
not have to go through the same between each machine, with the end 
thing, here are a few tips. machines having one empathy jack. 
This gave a resistance of about 160 
Getting started — Make up some net ohms across the cables. 
cables using speaker wire & mini. 
phone plugs. 3 would be enough. One Count Off - Each machine must be 
it: ore 10" Tt... aa one "20" IT: given a different number. Machines 
long. Toolkit II was used by us with a number less than 9, can be 
because it corrects errors in the used as a FILE SERVER. (This is a 
QL ROM but you can try it without Toolkit II function) 
it. Only one of each type of device 
is needed (printer, disk drive, OK? Here is your first command: NET 
modem, etc), each should have their station number <ENTER> (note enter 
own monitor though, but if data is will be <> from now on). Station 1 
to be exchanged you may want disk through 8 can use the next command: 
drives on 2 separate QLs. FSERVER <>. 


QLQLGLQ@QLQLQLQLALQLQLQLQLQL QL QL QL QLQcau 
aL aw 


RMG ENTERPRISES 
IS PROUD TO ANNOUNCE 
A NEW BUSINESS SOFTWARE PACKAGE FOR THE QL! 


INVENTORY/INVOICING PACKAGE 


_ FROM EXECUTIVE WORKSHOP 
If you are running a small business that apenes on a GOOD 


inventory control program, THIS IS THE ONE FOR YOU! 
our new 


With ackage you can keep track of all SALES, INCOMING 
STOCK, CURRENT STOCK VALUES BOTH WHOLESALE AND RETAIC, oe oot 
as generate the following hard copies: 


INVOICES ~ BACKORDER MEMOS - PACKING LISTS - SHIPPING LABELS 
INVENTORY REPORTS - PURCHASE ORDERS - FLAGGED ITEH REPORTS 
PRICELISTS - SELECTIVE PRICE LISTS 


All of this and the best part is, WE WILL CUSTOMIZE THIS PROGRAM 
TO SUIT YOU! When you Br der this package, you will be sent a 


short questionaire to fill out and return. Within 2 weeks you 
will receive your program, ready to go! 


ALL THAT AND AT A PRICE OF ONLY ESF .?PS5+t2ph 
FOR MORE INFORMATION ON THIS AND OTHER FINE QL PRODUCTS 
RMG ENTERPRISES 
1419 1/2 7TH STREET 
OREGON CITY, OR 97645 
503/ 65$-7484 


(FOR CATALOG - SEND $2 - DEDUCTED FROM FIRST REGULAR ORDER) 


rrrrrrrr 
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This command must come after the 
NET command. Any station may use 
any device connected with a file 
server. Stations that are servers 
may even access other servers in 
the net. 


Here are a few commands that can be 
used to access a server. With NET 
2 a server attached to a disk drive 
and NET 3 having a printer. 


LOAD n2_flp1_filename - This loads 
a basic program from NET 2's disk 
drive to the station the command 
was entered on. 


WCOPY n2_mdv1_ to flp2_ - This 
copys all files from NET 2's micro 
to disk drive 2 on originator. 


SAVE n2_flpi_program name - Save 


the basic program in originator to 
flp1 in net 2. 
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COPY program name TO n3_prt - Will 
list the program named to printer. 


You should be able to catch on 
using these commands. Specifying a 
double device suchas n2_ and prt 
or scr or flpl_ will usually work. 
Try a few commands until you feel 
comfortable with the syntax used in 
each statement. 


Most of the commands are given in 
Concepts, page 34, in the QL users 
manual. There are more commands 
that work with Toolkit. Commands 
that work in the background, such 


as print spoolers, can be used. 
When these commands are used, the 
server can use his or her station 


for other processing. 


Net is easy to use and can be fun. 
Share with another station. 
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